home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Big Mouth 13
/
Big_Mouth_The_13_1996_-_Side_C.d64
/
the main menu_bm
(
.txt
)
< prev
Wrap
Commodore BASIC
|
2023-02-26
|
1KB
|
49 lines
1 rem" "bugger off(NULL)
2 poke 808,234:poke 53280,0:poke 53281,0
4 fort=1 to 500:next
6 print"[147][155]"tab(7)"the big mouth - main menu"
8 fort=1 to 2000:next
10 print"[147]"
15 fort=1 to 500:next
20 printtab(7)"the big mouth - main menu"
30 print"a - life"
31 print"b - quad-mania"
32 print"c - fake"
33 print"d - miscellaneous tunes"
34 print"e - last ninja ripp"
35 print"f - satisfied santa"
36 print"g - usagi yojimbo"
37 print"h - jumpman junior"
38 print"i - reaction test 3"
50 print"pick a program to load (a-i) ?"
55 get a$:if a$="" then 55
60 a=asc(a$):if a-64<1 or a-64>9 then 55
65 if a-64=1 then 100
66 if a-64=9 then 140
67 forx=49152 to 49170:ready:poke x,y:nextx
70 print""tab(15)" loading "
75 sys 49152
76 data 120,169,013,141,040,003,169,192
77 data 141,041,003,088,096,238,032,208
78 data 076,237,246
80 on a-65 goto 105,110,115,120,125,130,135
99 :
100 print"load"chr$(34)" life "chr$(34)",8,1":print"run[145][145][145][145][145][145][145][145]"
101 new
105 load" quad-mania ",8,1
110 load"f.a.k.e .exe",8,1
115 load" miscellaneous ",8,1
120 load"last ninja ripp ",8,1
125 print"[147] satisfied santa - note"
126 print"this picture depicts santa in a way thatsome may find offensive."
127 print"the big mouth accepts no liability for any offence caused"
128 print"if you do not want to be offended then reset your computer now"
129 load"satisfied santa ",8,1
130 print"samurai warrior cheat:"
131 print"press f[146] on the title screen"
132 load"s.wariors +1/tcc",8,1
135 print"jumpman junior ar poke:"
136 print"infy lives - 39914,173"
137 load" jumpman junior ",8,1
140 load"reaction test 3 ",8